home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / amos / amsls396.lzh / AMOSLIST / 000096_mips.pfalz.de!d…hoenix.inka.de_Sun Mar 24 01:42:28 1996.msg < prev    next >
Internet Message Format  |  1996-04-01  |  6KB
  1. Received: from conan.eds-ms.com (conan.eds-ms.com [204.240.136.11]) by mail1.access.digex.net (8.6.12/8.6.12) with SMTP id BAA29362;  for <mcox@access.digex.net> ; Sun, 24 Mar 1996 01:42:25 -0500
  2. Received: from phoenix.inka.de by conan.eds-ms.com (5.x/SMI-SVR4)
  3.     id AA00971; Sun, 24 Mar 1996 01:14:30 -0500
  4. Received: from mips.pfalz.de  by phoenix.inka.de
  5.      with bsmtp (S3.1.29.1) id <m0u0irU-0009fCC>; Sun, 24 Mar 96 07:01 MET
  6. Received: from dog.pfalz.de by mips.pfalz.de with bsmtp
  7.     (Smail3.1.29.1 #6) id m0u0iC7-000CnCC; Sun, 24 Mar 96 06:18 MET
  8. Received: from kiste.pfalz.de by dog.pfalz.de with bsmtp
  9.     (Smail3.1.29.1 #33) id m0u0gS1-0000XMC; Sun, 24 Mar 96 04:26 MET
  10. X-Zc-Via: 19960323235542W+1@kiste.pfalz.de
  11. X-Zc-Via: 19960323125028W+1@sixpack.pfalz.de
  12. From: chris@sixpack.pfalz.de (Chris Hodges)
  13. Subject: Re: Hello
  14. Message-Id: <xUuVtMD261aRz1@p22.sixpack.pfalz.de>
  15. Date: Fri, 22 Mar 96 17:37:49 CET
  16. X-Zc-Telefon: V+49-89/8005856
  17. X-Zc-Post: Kennedystrasse 8; D-82178 Puchheim; Germany
  18. X-Mailer: MicroDot 1.10 [REGISTERED 000261] via Connectline-CLMSortin 2.27
  19. X-Gateway: ZConnect CL kiste.pfalz.de [Connectline/AmigaOS]
  20. To: amos-list@conan.eds-ms.com
  21. References: <Pine.SOL.3.91.960208125150.24678B-100000@red>
  22. Status: RO
  23. X-Status: 
  24.  
  25. cs922069@ariel.cs.yorku.ca (The Grifter) wrote on 08.02.1996 some text
  26. under the subject Hello. I can't leave this uncommentated ;-)
  27.  
  28. TG> Hello.  I finally got around to joining the list.
  29.  
  30. Hi Grifter ;-) sorry for the long delay of this mail... I just couldn't
  31. get around to reply on all the mails at once ;-)
  32.  
  33. TG> My current setup is as follows: 2000 w/1M chip & WB 2.04
  34. TG>                                 Gvp 030-33 w/8M
  35. TG>                                 52M Hd :(  (I hoping to get a Gig)
  36. TG>                                 AmosPro V2 w/compiler
  37.  
  38. Nice equipment ;-)
  39.  
  40. TG>                                 following extensions:   EasyLife
  41. TG>                                                         Craft (CU Amiga)
  42. TG>                                                         Jd4.x (just got 5.x)
  43. TG>                                 testing the following:  Amcaf
  44.  
  45. ;-))
  46.  
  47. TG>                                                         Powerbobs
  48. TG>
  49. TG> Top 5 tv shows: X-Files, Babylon 5, ST:DS9, Reboot (incredible 3D 
  50. TG> animation), Xena.
  51.  
  52. What's Reboot and Xena? Never heard of them here in Germany :-(
  53.  
  54. I'm quite surprised to find DS9 in your list and not TNG ;-)
  55.  
  56. TG> Now for some questions:
  57. TG> 1) Do all ECS machines come with 1M chip as standard?  I think so, but am 
  58. TG> not completely sure.
  59.  
  60. Yes. All (true) ECS machines come with 1 MB of chip mem... You shouldn't
  61. really care of machines with less than 1 MB chip mem. ;-)
  62.  
  63. TG> 2) Is the Jd extension shareware?  I can't read German (I had to use an 
  64. TG> English/German dictionary to translate the command syntax) and cannot see 
  65. TG> anything that might be stating shareware fees.  I have checked the 
  66. TG> English docs in the current version.
  67.  
  68. The JD extension is FreeWare AFAIK.
  69.  
  70. TG> 3) Is there anyway for the screen copy command to make colour 0 
  71. TG> transparent?  Amcaf does but only for individual bitplanes (I could be 
  72. TG> wrong though).  I have tried the various mask combinations to no avail.  
  73. TG> I think its because it doesn't use blitter area A.  Currently I'm 
  74. TG> grabbing selecting areas with  the get sprite command, then pasting over 
  75. TG> selected areas.
  76.  
  77. Try this one:
  78.  
  79. Load Iff "dh1:grafik/dpaint/picture/misc/A500.iff",0
  80. Wait Vbl 
  81. WX=Screen Width : WY=Screen Height : AC=Screen Colour : PL=Binlog(AC)
  82. ' Target screen
  83. Screen Open 1,WX,WY,AC,0
  84. Curs Off : Flash Off : Paper 0 : Pen 1 : Cls 
  85. Get Palette 0
  86. ' Temporary bitplane 
  87. Screen Open 7,WX,WY,2,0 : Screen Hide 
  88. Curs Off : Flash Off : Paper 0 : Pen 1 : Cls 
  89. Blitter Copy Limit 7
  90. ' Create mask: 
  91. Blitter Clear 7,0
  92. For A=0 To PL-1
  93.   Blitter Copy 0,A,7,0 To 7,0,%11111100
  94. Next 
  95. ' Change background of target screen 
  96. Screen 1
  97. For Y=0 To WY-1
  98.   Ink Y/4 : Draw 0,Y To WX,Y
  99. Next 
  100. ' Copy with mask only
  101. For A=0 To PL-1
  102.   Blitter Copy 0,A,1,A,7,0 To 1,A,%11110100
  103. Next 
  104. Screen To Front 
  105.  
  106. It first creates the mask of the picture and then copies the parts with
  107. are not transparent to the target screen.
  108.  
  109. TG> 4) Is it possible to save a portion of the screen to a bank without 
  110. TG> compression? I'm asking this because it would be faster on '000 machines 
  111. TG> than if I used packed images which I am currently doing.  I cannot 
  112. TG> degrade to '000 anymore at home.
  113.  
  114. Well, you could simply try the following.
  115.  
  116. Procedure STOREPICCY[scr,bank]
  117.   OLDSCREEN=Screen
  118.   Screen SCR
  119.   WX=Screen Width/8 : WY=Screen Height : AC=Screen Colour
  120.   PL=Min(Binlog(AC),6) : RES=Screen Mode
  121.   Reserve As Work BANK,WX*WY*PL+16
  122.   ST=Start(BANK)
  123.   Doke ST,WX : Doke ST+2,WY : Doke ST+4,AC : Doke ST+6,PL
  124.   Doke ST+8,RES
  125.   For A=0 To PL-1
  126.     Copy Logbase(A),Logbase(A)+WX*WY To ST+16+A*WX*WY
  127.   Next
  128.   Screen OLDSCREEN
  129. End Proc
  130.  
  131. Procedure EXTRACTPICCY[scr,bank]
  132.   ST=Start(BANK)
  133.   WX=Deek(ST) : WY=Deek(ST+2) : AC=Deek(ST+4) : PL=Deek(ST+6)
  134.   RES=Deek(ST+8)
  135.   Screen Open SCR,WX,WY,AC,RES : Screen Hide
  136.   Curs Off : Flash Off : Paper 0 : Pen 1 : Cls 0
  137.   For A=0 To PL-1
  138.     Copy ST+16+A*WX*WY,ST+16+(A+1)*WX*Wy To Logbase(A)
  139.   Next
  140.   Screen Show
  141. End Proc
  142.  
  143. Haven't tested this, but it should work...
  144.  
  145. TG> I have a few more questions but I think I'll keep them for latter.  I'm 
  146. TG> getting close to that 4K limit.  I'll keep my postings short in the 
  147. TG> future if there are any complaints.
  148.  
  149. Oh, I think you shouldn't really care about that 4KB limit for you really
  150. got some nice questions hehe ;-)
  151.  
  152. Bye, Chris Hodges <chris@sixpack.pfalz.de>       __   __
  153. A4000/60/11MB/420HD/CD; AMOS Extension-Coder__  ///  / / _____
  154. GCS d H s-:++ !g p? !au a19 w++ v? C+++     \\\///  / /_/ ___/ LOGOUT
  155. E---- N++ K- W------ -po+ t++@ !5 j-- R+ G?  \XX/   \__/ __/  FASCISM!
  156. tv- b+ D-- B? e+(++)* u++ h! f !r n+ !y+ AMIGA RULEZ!  \/
  157.  
  158. Bromsgrove (n.)
  159.   Any urban environment containing a small amount of dog turd and
  160.   about forty-five tons of bent steel pylon or a lump of concrete
  161.   with holes claiming to be sculpture.
  162.     Oh come my dear, and come with me
  163.     And wander 'neath the bromsgrove tree - Betjeman
  164. (from: "The Deeper Meaning of Liff")